home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmsyscm / _setup.1 / AHMTExitWindows.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-11-12  |  2.1 KB  |  65 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTExitWindows.pas' rev: 3.00
  6.  
  7. #ifndef AHMTExitWindowsHPP
  8. #define AHMTExitWindowsHPP
  9. #include <AHMSystem.hpp>
  10. #include <Controls.hpp>
  11. #include <SysUtils.hpp>
  12. #include <Dialogs.hpp>
  13. #include <Forms.hpp>
  14. #include <Classes.hpp>
  15. #include <Messages.hpp>
  16. #include <Windows.hpp>
  17. #include <SysInit.hpp>
  18. #include <System.hpp>
  19.  
  20. //-- user supplied -----------------------------------------------------------
  21.  
  22. namespace Ahmtexitwindows
  23. {
  24. //-- type declarations -------------------------------------------------------
  25. enum TAHMExitType { xLogoff, xReboot, xShutDown, xPowerOff, xForce };
  26.  
  27. class DELPHICLASS TAHMExitWindows;
  28. class PASCALIMPLEMENTATION TAHMExitWindows : public Ahmsystem::TAHMExecuteComponent 
  29. {
  30.     typedef Ahmsystem::TAHMExecuteComponent inherited;
  31.     
  32. private:
  33.     TAHMExitType FExitType;
  34.     System::AnsiString FLastError;
  35.     bool FConfirm;
  36.     System::AnsiString FConfirmMessage;
  37.     Classes::TNotifyEvent FOnExecute;
  38.     void __fastcall SetExitType(TAHMExitType Value);
  39.     
  40. public:
  41.     __fastcall virtual TAHMExitWindows(Classes::TComponent* AOwner);
  42.     virtual bool __fastcall Execute(void);
  43.     __property System::AnsiString LastError = {read=FLastError};
  44.     
  45. __published:
  46.     __property About ;
  47.     __property TAHMExitType ExitType = {read=FExitType, write=SetExitType, default=1};
  48.     __property System::AnsiString ConfirmMessage = {read=FConfirmMessage, write=FConfirmMessage};
  49.     __property bool Confirm = {read=FConfirm, write=FConfirm, default=1};
  50.     __property Classes::TNotifyEvent OnExecute = {read=FOnExecute, write=FOnExecute};
  51. public:
  52.     /* TComponent.Destroy */ __fastcall virtual ~TAHMExitWindows(void) { }
  53.     
  54. };
  55.  
  56. //-- var, const, procedure ---------------------------------------------------
  57. extern PACKAGE bool __fastcall AHMExitWindows(int flags);
  58.  
  59. }    /* namespace Ahmtexitwindows */
  60. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  61. using namespace Ahmtexitwindows;
  62. #endif
  63. //-- end unit ----------------------------------------------------------------
  64. #endif    // AHMTExitWindows
  65.